100 POKE53280,6:POKE53281,3:PRINTCHR$(142)
110 GOSUB1000
120 L$=""
140 PRINT"[147]":FORI=1TO5:PRINTTAB(11)A$(I):NEXT:TA=11
145 PRINT"[145] "A$(6)SPC(2)"[183]"SPC(8)"[183]"SPC(6)A$(7):PRINT" "A$(8)
150 A=A+1:B=B+1:READPR$:IFA>9THENTA=10
160 PRINTLEFT$(L$,B+7)TAB(TA)"[144]"A"-"PR$
165 IFB=14THEN175
170 GOTO 150
175 IFA>=28THENRESTORE:A=0
190 PRINTLEFT$(L$,24)TAB(7)"[149](C) ION INTERNATIONAL INC"
200 PRINTLEFT$(L$,22)TAB(8)" RETURN [146][144] OR CHOOSE NO.";
210 POKE198,0:INPUTAN$:AN=VAL(AN$):B=0
215 IFAN$=""THEN140
225 RESTORE:FORCH=1TOAN:READPR$:NEXT
230 PRINT"[147]":POKE53280,0:POKE53281,0
235 PRINTLEFT$(L$,15)TAB(10)"[156][204]OADING "PR$"[144]"
240 PRINT "LOAD";CHR$(34);PR$;CHR$(34);",8,1"
250 PRINT "RUN":PRINT "[145][145][145][145][145][145][145][145][145]"
260 POKE 631,13:POKE 632,13:POKE 198,2:END
490 DATA AHOY! NOTES,COMAL NOTES
500 DATA FLANKSPEED,64 BUG REP,128 BUG REP,SORT 128,SORT 64,LEFT OVERS 1
510 DATA LEFT OVERS 2,SOUND CHALLENGE,DOUBLE WEDGE,DOUBLE WEDGE 2,TOKEN LISTER 1
520 DATA TOKEN LISTER 2,COPYCHRS.128,COPYCHRS2.128,C-64 DOS,C-128 DOS
530 DATA MUSIC SCHOOL,NBRGLL RUN 128,CRAZY JOE,HEAD-ON BOOT,ESCAPE SKULL
540 DATA WORDCOUNT,SCREEN SLEUTH,REVERSED REMARKS,REVREM DEMO,BOOT C64 COMAL
1000 A$(1)="[144][207][205][206][183][205][207][183][183][205][207][205] [207][205][207][205][207][205]"
1010 A$(2)="[180] [223][169] [146][180]   [146][180] [223][146][180] [146][180] [146][180] "
1020 A$(3)="[180] [146][223][169] [146][180] [146][205] [180] [146][223][223] [146][180] [146][180] "
1030 A$(4)="[180] [146] [180] [146][180] [175][146][205][180] [146][205][223] [146][180] [146][180] "
1040 A$(5)="[205] [146] [205] [146][205]   [146][205] [146] [205] [146][205]   "
1050 A$(6)="[144][207][183][183][183][183][183][183][183][183][183]":A$(7)="[183][183][183][183][183][183][183][183][183][208]"
1060 A$(8)="[183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]"
1100 RETURN